1 //+------------------------------------------------------------------+
\r
2 //| Meta COT Net Positions.mq4 |
\r
3 //| Copyright © 2009, C-4 (Vasiliy Sokolov, Russia, St.-Petersburg,|
\r
4 //| 2009), All Rights Reserved. |
\r
6 //+------------------------------------------------------------------+
\r
7 #property copyright "Copyright © 2009, C-4, All Rights Reserved."
\r
8 #property link "vs-box@mail.ru"
\r
9 #property show_inputs
\r
10 extern int period=26;
\r
11 extern int indicator_tape=21; //Ñìîòðè íîìåðà ñîîòâåòñâóþùèå èíäèêàòîðàì â cotlib.mq4 â ðàçäåëå defines
\r
12 int movement_index=6;
\r
13 #include <cotlib.mq4>
\r
18 int sell_level_down;
\r
22 //handle=FileOpen("COT - U.S. DOLLAR CONCATENATE.csv",FILE_READ|FILE_CSV);
\r
23 //if(handle==-1)Print("Íå óäàåòñÿ çàãðóçèòü ôàéë");
\r
24 if(init_data()==false)error=true;
\r
25 if(error==false)load_data();
\r
26 if(error==false)count_data();
\r
27 //if(error==true)Print("---------->>>>>>> ERORR!!! <<<<<<<<<--------------");
\r
34 if(OrdersTotal()>0)return;
\r
35 if(buy_level_up==0)return;
\r
36 if(type_op()==OP_BUY&&delta_fma()>0&&delta_sma()>0){
\r
37 OrderSend(Symbol(),OP_BUY,0.1,Ask,3,Ask-ticksize*100*(period/26),Ask+ticksize*300*(period/26),"",12345,0,Blue);
\r
39 if(type_op()==OP_SELL&&delta_fma()<0&&delta_sma()<0){
\r
40 OrderSend(Symbol(),OP_SELL,0.1,Bid,3,Ask+ticksize*100*(period/26),Ask-ticksize*300*(period/26),"",12345,0,Red);
\r
42 //Print(get_data(WILLCO_OPERATORS, 0));
\r
48 //return(iMA(Symbol(),0,5+(1-(period/26)),0,MODE_SMA,PRICE_CLOSE,0)-
\r
49 // iMA(Symbol(),0,5+(1-(period/26)),0,MODE_SMA,PRICE_CLOSE,2));
\r
50 return(iMA(Symbol(),0,5,0,MODE_SMA,PRICE_CLOSE,0)-
\r
51 iMA(Symbol(),0,5,0,MODE_SMA,PRICE_CLOSE,2));
\r
56 return(iMA(Symbol(),PERIOD_W1,period,0,MODE_SMA,PRICE_CLOSE,0)-
\r
57 iMA(Symbol(),PERIOD_W1,period,0,MODE_SMA,PRICE_CLOSE,2));
\r
62 switch(indicator_tape){
\r
63 case WILLCO_OPERATORS: // 17
\r
64 case INDEX_OI: // 19
\r
65 case INDEX_OPERATORS: // 21
\r
70 case WILLCO_NONCOMM: // 16
\r
71 case WILLCO_NONREP: // 18
\r
72 case INDEX_NONCOMM: // 20
\r
73 case INDEX_NONREP: // 22
\r
78 case MOVEMENT_NONCOMM: // 23
\r
79 case MOVEMENT_NONREP: // 25
\r
80 case MOVEMENT_OI: // 26
\r
81 /*buy_level_down=-100;
\r
84 sell_level_up=100;*/
\r
87 sell_level_down=-100;
\r
89 case MOVEMENT_OPERATORS: // 24
\r
92 sell_level_down=-100;
\r
95 ticksize=MarketInfo(Symbol(), MODE_TICKSIZE);
\r
100 if(get_data(indicator_tape,0)>=buy_level_down&&get_data(indicator_tape,0)<=buy_level_up)
\r
102 if(get_data(indicator_tape,0)>=sell_level_down&&get_data(indicator_tape,0)<=sell_level_up)
\r